home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-02 / pasmou.zip / README.TXT < prev    next >
Text File  |  1991-06-14  |  2KB  |  40 lines
  1.                                                   June 14, 1991
  2.  
  3.  
  4.    When I saw Dave Kirsch's mouse routines for Turbo and Microsoft C I was
  5. impressed enough to look for a way to use them in my Turbo Pascal programs.
  6. After a lot of head scratching I finally came up with an object file that
  7. could be linked to produce a Turbo Pascal Unit.  MOUSE.TPU is the result.
  8.  
  9.    MOUSE.TPU is ready to use for Turbo Pascal version 6.  MOUSE.PAS will
  10. need to be re-compiled for other versions of Turbo Pascal.  DEMO.PAS is,
  11. of course, a demonstration of the use of many of the routines.  Also included
  12. are all of Mr. Kirsch's original files.
  13.  
  14.    Please refer to Mr. Kirsch's original MOU.DOC file for an explanation
  15. of what each one of the routines does.  In addition to Mr. Kirsch's routines
  16. I've added two procedures written in Turbo Pascal:
  17.  
  18.        MOUmove(X, Y: integer)  Moves the mouse cursor to the screen
  19.           coordinates X, Y.
  20.  
  21.        MOUconfine(X1, Y1, X2, Y2: integer)  Confines the mouse cursor to
  22.           an area on the screen.  X1, Y1 is the upper left hand corner and
  23.           X2, Y2 is the lower right hand corner.
  24.  
  25.    For an example of how to use these and other procedures in the unit please
  26. refer to the DEMO.PAS file.
  27.  
  28.    I've already re-written one of my Pascal programs to use these new mouse
  29. routines.  It sure is slick to see the mouse cursor glide across the screen
  30. rather than jerk across.  Run DEMO.EXE and see if you don't agree.
  31.  
  32.                                       Jim Loos
  33.                                       2601 Dawn Dr.
  34.                                       Alexandria, VA 22306
  35.                                       (703) 765-1054
  36.  
  37.  
  38.  
  39.  
  40.